A=[[1;1],zeros(2,99)];
R=zeros(1,100);
R(1)=1;
for n=1:99
    A(:,n+1)=NextFibonacci(A(:,n));
    R(n+1)=A(2,n+1)/A(1,n+1);
end;

plot(1:100,R,'r');